From b845943f69b96012406a08fb28a55321b6cea898 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Wed, 10 Jul 2002 11:06:54 +0000 Subject: [PATCH] (authors-obsolete-file-p): Fix typo. --- lisp/emacs-lisp/authors.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lisp/emacs-lisp/authors.el b/lisp/emacs-lisp/authors.el index acb9573e66d..9d5feb36879 100644 --- a/lisp/emacs-lisp/authors.el +++ b/lisp/emacs-lisp/authors.el @@ -46,7 +46,7 @@ file individually.") ("(pmr@legacy.pajato.com)" . "Paul Reilly") ("(Eric Youngdale at youngdale@v6550c.nrl.navy.mil)" . "Eric Youngdale") ("" . "Daniel Pfeiffer") - ("" . "Daniel Pfeiffer") + ("" . "Daniel Pfeiffer") ("(afs@hplb.hpl.hp.com)" . "ignore") ("" . "ignore") ("Code Extracted" . "ignore") @@ -240,10 +240,10 @@ listed.") (setq action item) (authors-add author item action table)))))) - + (defun authors-obsolete-file-p (file) "Return non-nil if FILE is obsolete. -FILE is considered obsolete if it matches on of the regular expressions +FILE is considered obsolete if it matches one of the regular expressions from `authors-obsolete-files-regexps'." (let (obsolete-p (regexps authors-obsolete-files-regexps)) @@ -315,7 +315,7 @@ file. :wrote means the author wrote the file :changed means he changed the file." - + (let* ((enable-local-variables t) (enable-local-eval t) (existing-buffer (get-file-buffer file)) -- 2.30.2